<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html><head><meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
<title>Template Units For Numerical Applications</title>
<link href="TUNAstyles.css" rel="stylesheet" type="text/css">
<link href="tabs.css" rel="stylesheet" type="text/css">
<style type="text/css">

.cabeza_cell {
  border-left: 1px solid #000000;
  border-right: 1px solid #000000;
  border-bottom: 1px solid #000000;
  border-top: 1px solid #000000;
  font-family: Arial,Helvetica,sans-serif;
  font-size: 11pt;
  background-color: #ffffff;
  font-weight: lighter;
  color: #000000;
  text-decoration: none;
}
</style>

</head><body>
<div>
<table align="center" width="640" border="0" cellspacing="2" cellpadding="5" class="border">
<tr>
 <td class="cabeza_cell"> 

  <font style="font-family: helvetica; color: #000000;" size=4>
    <font style="font-family: helvetica; color: #336699; font-weight=bold" size=5>TUNA</font> :
    <font style="font-family: helvetica; color: #336699; font-weight=bold" size=5>T</font>emplate
    <font style="font-family: helvetica; color: #336699; font-weight=bold" size=5>U</font>nits for
    <font style="font-family: helvetica; color: #336699; font-weight=bold" size=5>N</font>umerical 
    <font style="font-family: helvetica; color: #336699; font-weight=bold" size=5>A</font>pplications
 </font><br>
  
</td>
</tr>

<tr>
<td class="cabeza_cell">
 <span style="font-family: helvetica; color: #336699;">
 Documentation Ver 1.0.0 August 2011 by
 <a href="http://mmc.geofisica.unam.mx/luiggi">Luis M. de la Cruz</a> <br>
 <a href="http://mmc.geofisica.unam.mx"> GMMC </a> -
 <a href="http://www.geofisica.unam.mx/recnat/"> Depto. de Recursos Naturales </a> -
 <a href="http://www.geofisica.unam.mx"> Instituto de Geof&iacute;sica </a> -
 <a href="http://www.unam.mx"> UNAM </a><br>
 </span>
 </td>

</tr>

</table>
</div>
<br>
<!-- Generated by Doxygen 1.7.4 -->
<script type="text/javascript"><!--
var searchBox = new SearchBox("searchBox", "search",false,'Search');
--></script>
  <div id="navrow1" class="tabs">
    <ul class="tablist">
      <li><a href="index.html"><span>Main&#160;Page</span></a></li>
      <li><a href="annotated.html"><span>Classes</span></a></li>
      <li class="current"><a href="files.html"><span>Files</span></a></li>
      <li id="searchli">
        <div id="MSearchBox" class="MSearchBoxInactive">
        <span class="left">
          <img id="MSearchSelect" src="search/mag_sel.png"
               onmouseover="return searchBox.OnSearchSelectShow()"
               onmouseout="return searchBox.OnSearchSelectHide()"
               alt=""/>
          <input type="text" id="MSearchField" value="Search" accesskey="S"
               onfocus="searchBox.OnSearchFieldFocus(true)" 
               onblur="searchBox.OnSearchFieldFocus(false)" 
               onkeyup="searchBox.OnSearchFieldChange(event)"/>
          </span><span class="right">
            <a id="MSearchClose" href="javascript:searchBox.CloseResultsWindow()"><img id="MSearchCloseImg" border="0" src="search/close.png" alt=""/></a>
          </span>
        </div>
      </li>
    </ul>
  </div>
  <div id="navrow2" class="tabs2">
    <ul class="tablist">
      <li><a href="files.html"><span>File&#160;List</span></a></li>
      <li><a href="globals.html"><span>File&#160;Members</span></a></li>
    </ul>
  </div>
<div class="header">
  <div class="headertitle">
<div class="title">Examples/09FlowInPorousMedia/BL/BLIP3.hpp</div>  </div>
</div>
<div class="contents">
<div class="fragment"><pre class="fragment"><a name="l00001"></a>00001 <span class="preprocessor">#ifndef _BLIP3_H_</span>
<a name="l00002"></a>00002 <span class="preprocessor"></span><span class="preprocessor">#define _BLIP3_H_</span>
<a name="l00003"></a>00003 <span class="preprocessor"></span>
<a name="l00004"></a>00004 <span class="preprocessor">#include &quot;Equations/TwoPhaseEquation.hpp&quot;</span>
<a name="l00005"></a>00005 
<a name="l00006"></a>00006 <span class="keyword">namespace </span>Tuna {
<a name="l00007"></a>00007 
<a name="l00008"></a>00008   <span class="keyword">template</span> &lt;<span class="keyword">typename</span> T, <span class="keywordtype">int</span> Dim&gt; <span class="keyword">class </span>BLIP3;
<a name="l00009"></a>00009 
<a name="l00010"></a>00010   <span class="keyword">template</span> &lt;<span class="keyword">typename</span> T&gt;
<a name="l00011"></a>00011   <span class="keyword">struct </span>Typeinfo &lt;BLIP3&lt;T, 1&gt; &gt; {
<a name="l00012"></a>00012     <span class="keyword">typedef</span> T prec_t;
<a name="l00013"></a>00013     <span class="keyword">enum</span> { Dim = 1 };
<a name="l00014"></a>00014   };
<a name="l00015"></a>00015 
<a name="l00016"></a>00016   <span class="keyword">template</span> &lt;<span class="keyword">typename</span> T&gt;
<a name="l00017"></a>00017   <span class="keyword">struct </span>Typeinfo &lt;BLIP3&lt;T, 2&gt; &gt; {
<a name="l00018"></a>00018     <span class="keyword">typedef</span> T prec_t;
<a name="l00019"></a>00019     <span class="keyword">enum</span> { Dim = 2 };
<a name="l00020"></a>00020   };
<a name="l00021"></a>00021 
<a name="l00022"></a>00022   <span class="keyword">template</span> &lt;<span class="keyword">typename</span> T&gt;
<a name="l00023"></a>00023   <span class="keyword">struct </span>Typeinfo &lt;BLIP3&lt;T, 3&gt; &gt; {
<a name="l00024"></a>00024     <span class="keyword">typedef</span> T prec_t;
<a name="l00025"></a>00025     <span class="keyword">enum</span> { Dim = 3 };
<a name="l00026"></a>00026   };
<a name="l00027"></a>00027 
<a name="l00028"></a>00028   
<a name="l00029"></a>00029   <span class="keyword">template</span>&lt;<span class="keyword">typename</span> Tprec, <span class="keywordtype">int</span> Dim&gt;
<a name="l00030"></a>00030   <span class="keyword">class </span>BLIP3 : <span class="keyword">public</span> TwoPhaseEquation&lt;BLIP3&lt;Tprec, Dim&gt; &gt;
<a name="l00031"></a>00031   {
<a name="l00032"></a>00032 
<a name="l00033"></a>00033     <span class="keyword">typedef</span> TwoPhaseEquation&lt;BLIP3&lt;Tprec, Dim&gt; &gt; TP_BLIP3;
<a name="l00034"></a>00034     
<a name="l00035"></a>00035     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::aE;
<a name="l00036"></a>00036     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::aW;
<a name="l00037"></a>00037     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::aN;
<a name="l00038"></a>00038     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::aS;
<a name="l00039"></a>00039     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::aB;
<a name="l00040"></a>00040     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::aP;
<a name="l00041"></a>00041     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::sp;
<a name="l00042"></a>00042     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::dx;
<a name="l00043"></a>00043     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::dy;
<a name="l00044"></a>00044     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::dz;
<a name="l00045"></a>00045     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::bi;
<a name="l00046"></a>00046     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::ei;
<a name="l00047"></a>00047     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::bj;
<a name="l00048"></a>00048     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::ej;
<a name="l00049"></a>00049     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::bk;
<a name="l00050"></a>00050     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::ek;
<a name="l00051"></a>00051     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::applyBoundaryConditions1D;
<a name="l00052"></a>00052     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::applyBoundaryConditions2D;
<a name="l00053"></a>00053     <span class="keyword">using</span> GeneralEquation&lt; TP_BLIP3 &gt;::applyBoundaryConditions3D;
<a name="l00054"></a>00054 
<a name="l00055"></a>00055     <span class="keyword">using</span> TP_BLIP3::S;
<a name="l00056"></a>00056     <span class="keyword">using</span> TP_BLIP3::phi_0;
<a name="l00057"></a>00057     <span class="keyword">using</span> TP_BLIP3::Srw;
<a name="l00058"></a>00058     <span class="keyword">using</span> TP_BLIP3::Sro;
<a name="l00059"></a>00059     <span class="keyword">using</span> TP_BLIP3::mu_w;
<a name="l00060"></a>00060     <span class="keyword">using</span> TP_BLIP3::mu_o;
<a name="l00061"></a>00061     <span class="keyword">using</span> TP_BLIP3::k;
<a name="l00062"></a>00062 
<a name="l00063"></a>00063   <span class="keyword">public</span>:
<a name="l00064"></a>00064     <span class="keyword">typedef</span> Tprec prec_t;
<a name="l00065"></a>00065     <span class="keyword">typedef</span> <span class="keyword">typename</span> TunaArray&lt;prec_t, Dim &gt;::huge ScalarField;
<a name="l00066"></a>00066     
<a name="l00067"></a>00067     BLIP3() : TwoPhaseEquation&lt;BLIP3&lt;prec_t, Dim &gt; &gt;() { }    
<a name="l00068"></a>00068     ~BLIP3() { };
<a name="l00069"></a>00069     
<a name="l00070"></a>00070     <span class="keyword">inline</span> <span class="keywordtype">bool</span> calcCoefficients1D(); 
<a name="l00071"></a>00071     <span class="keyword">inline</span> <span class="keywordtype">bool</span> calcCoefficients2D() { };
<a name="l00072"></a>00072     <span class="keyword">inline</span> <span class="keywordtype">bool</span> calcCoefficients3D() { };
<a name="l00073"></a>00073     <span class="keyword">inline</span> <span class="keywordtype">void</span> printInfo() { std::cout &lt;&lt; <span class="stringliteral">&quot; BLIP3 &quot;</span>; }
<a name="l00074"></a>00074   };
<a name="l00075"></a>00075 
<a name="l00076"></a>00076 <span class="comment">/*</span>
<a name="l00077"></a>00077 <span class="comment"> *  Lineal for realtive permeability , Average for Sw</span>
<a name="l00078"></a>00078 <span class="comment"> */</span>
<a name="l00079"></a>00079 <span class="keyword">template</span>&lt;<span class="keyword">typename</span> Tprec, <span class="keywordtype">int</span> Dim&gt;
<a name="l00080"></a>00080 <span class="keyword">inline</span> <span class="keywordtype">bool</span> BLIP3&lt;Tprec, Dim&gt;::calcCoefficients1D () 
<a name="l00081"></a>00081 {
<a name="l00082"></a>00082     <span class="keyword">static</span> prec_t Sw_e, Sw_w;
<a name="l00083"></a>00083 
<a name="l00084"></a>00084     <span class="comment">// Lineal </span>
<a name="l00085"></a>00085     <span class="keyword">static</span> prec_t mult_o = k / (1 - Srw - Sro) * mu_o * dx ;
<a name="l00086"></a>00086     <span class="keyword">static</span> prec_t mult_w = k / (1 - Srw - Sro) * mu_w * dx ;
<a name="l00087"></a>00087     
<a name="l00088"></a>00088     aE = 0.0; aW = 0.0; aP = 0.0; sp = 0.0;
<a name="l00089"></a>00089 
<a name="l00090"></a>00090     <span class="keywordflow">for</span> (<span class="keywordtype">int</span> i =  bi; i &lt;= ei; ++i) {      
<a name="l00091"></a>00091 
<a name="l00092"></a>00092       <span class="comment">// Average</span>
<a name="l00093"></a>00093       Sw_e = ( S(i+1) + S(i) ) * 0.5;
<a name="l00094"></a>00094       Sw_w = ( S(i-1) + S(i) ) * 0.5;      
<a name="l00095"></a>00095 
<a name="l00096"></a>00096       <span class="comment">// Lineal</span>
<a name="l00097"></a>00097       aE (i) = (1 - Sro - Sw_e) * mult_o + (Sw_e - Srw) * mult_w ;
<a name="l00098"></a>00098       aW (i) = (1 - Sro - Sw_w) * mult_o + (Sw_w - Srw) * mult_w ;
<a name="l00099"></a>00099       aP (i) = aE (i) + aW (i);      
<a name="l00100"></a>00100     }
<a name="l00101"></a>00101     applyBoundaryConditions1D();
<a name="l00102"></a>00102     <span class="keywordflow">return</span> 0;
<a name="l00103"></a>00103 }
<a name="l00104"></a>00104 
<a name="l00105"></a>00105 
<a name="l00106"></a>00106 
<a name="l00107"></a>00107 } <span class="comment">// Tuna namespace</span>
<a name="l00108"></a>00108 
<a name="l00109"></a>00109 
<a name="l00110"></a>00110 <span class="preprocessor">#endif //_BLIP3_H_</span>
<a name="l00111"></a>00111 <span class="preprocessor"></span>
<a name="l00112"></a>00112 
<a name="l00113"></a>00113 
<a name="l00114"></a>00114 
<a name="l00115"></a>00115 
<a name="l00116"></a>00116 
<a name="l00117"></a>00117 
<a name="l00118"></a>00118 
<a name="l00119"></a>00119 
<a name="l00120"></a>00120 
<a name="l00121"></a>00121 
<a name="l00122"></a>00122 
<a name="l00123"></a>00123 
<a name="l00124"></a>00124 
<a name="l00125"></a>00125 
<a name="l00126"></a>00126 
<a name="l00127"></a>00127 
</pre></div></div>
</div>
<!-- window showing the filter options -->
<div id="MSearchSelectWindow"
     onmouseover="return searchBox.OnSearchSelectShow()"
     onmouseout="return searchBox.OnSearchSelectHide()"
     onkeydown="return searchBox.OnSearchSelectKey(event)">
<a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(0)"><span class="SelectionMark">&#160;</span>All</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(1)"><span class="SelectionMark">&#160;</span>Classes</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(2)"><span class="SelectionMark">&#160;</span>Files</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(3)"><span class="SelectionMark">&#160;</span>Functions</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(4)"><span class="SelectionMark">&#160;</span>Variables</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(5)"><span class="SelectionMark">&#160;</span>Typedefs</a></div>

<!-- iframe showing the search results (closed by default) -->
<div id="MSearchResultsWindow">
<iframe src="javascript:void(0)" frameborder="0" 
        name="MSearchResults" id="MSearchResults">
</iframe>
</div>



<hr size="1">
<div align="center">
Last modification: Sun Aug 28 09:57:21 CDT 2011
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&copy; 2011 LMCS-UNAM
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
Generated by <a href="http://www.doxygen.org/index.html">
<img src="doxygen.png" alt="doxygen" align="top" border="0" height="25"></a> 1.6.1 </div>

